home *** CD-ROM | disk | FTP | other *** search
/ Electronics Boutique Catalog 1996 Spring / 1996 Electronics Boutique Spring CD-ROM (USA).bin / eb / demos / c64demo.dir / 00014.ls < prev    next >
Encoding:
Text File  |  1995-12-07  |  713 b   |  33 lines
  1. on mouseDown
  2.   puppetSound("StoryB")
  3.   puppetSprite(3, 1)
  4.   puppetSprite(11, 1)
  5.   set the castNum of sprite 3 to 26
  6.   set the castNum of sprite 11 to 27
  7.   updateStage()
  8.   startTimer()
  9.   repeat while the timer < 15
  10.     nothing()
  11.   end repeat
  12.   set the castNum of sprite 3 to 25
  13.   set the castNum of sprite 11 to 28
  14.   updateStage()
  15.   startTimer()
  16.   repeat while the timer < 15
  17.     nothing()
  18.   end repeat
  19.   set the castNum of sprite 3 to 26
  20.   set the castNum of sprite 11 to 27
  21.   updateStage()
  22.   startTimer()
  23.   repeat while the timer < 15
  24.     nothing()
  25.   end repeat
  26.   set the castNum of sprite 3 to 25
  27.   set the castNum of sprite 11 to 28
  28.   updateStage()
  29.   puppetSprite(3, 0)
  30.   puppetSprite(11, 0)
  31.   go("story")
  32. end
  33.